www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\Model\ComponentLabels\多行多列批量输入框控件\editmode_label.asp

    <%'$start_ext_newDsoft 以下系统生成,勿删!
'$newDsoft_label_type$:asp_label$end_newDsoft_label_type$
'$newDsoft_label_name$:$editmode$-ComponentLabel-$$end_newDsoft_label_name$
'$newDsoft_label_sql$: $end_newDsoft_label_sql$
'$newDsoft_label_params$:cangsx,多行多列输入框配置参数$end_newDsoft_label_params$
'$newDsoft_label_fenye_num$: $end_newDsoft_label_fenye_num$
'$newDsoft_label_beizhu$:在修改页里的标签$end_newDsoft_label_beizhu$
'$newDsoft_is_sys_label$:0$end_newDsoft_is_sys_label$
'$newDsoft_other_params$:htmledxa:|htmledxb:$end_newDsoft_other_params$
'$end_ext_newDsoft%><%



cvva=split($xxvar$cangsx,"|$aspcpu_f$|")
cvva_0=cvva(0)
cvva_0_p=split(cvva_0,",")

'多行多列批量输入框的初始行数
cvva_0_p_1=cvva_0_p(0)
'多行多列批量输入框的最大行数(不填则无限制)
cvva_0_p_2=cstr(cvva_0_p(1)&"")
'是否允许删除某行
cvva_0_p_3=cstr(cvva_0_p(2)&"")
if cvva_0_p_3="" then cvva_0_p_3="0"
if cvva_0_p_2="" then cvva_0_p_2="0"




if have_add_plcss="" then
have_add_plcss="1"
%>

<style>
.inputfield{
 border:1px solid #008080; background-color:#CCCCCC;
}
/*.inputfield2{
 border:0px;
 background-color:#E6F0F0;
}*/
.inputfieldtd{
background-color:#E6F0F0;
}
.inputfieldtd2{
background-color:#FFFFFF;
}

.borderon2 {
	font-size: 12px;
	border-top-width: 1px;
	border-right-width: 1px;
	border-bottom-width: 1px;
	border-left-width: 1px;
	background-color: #D9D9D9;
	border-top-style: solid;
	border-right-style: solid;
	border-bottom-style: solid;
	border-left-style: solid;
	border-top-color: #FFFFFF;
	border-right-color: #808080;
	border-bottom-color: #808080;
	border-left-color: #FFFFFF;

}



</style>

<script language=javascript>


 function focusChange(fieldName)
 {fieldName.className="inputfield";}


 function blurChange(fieldName)
{
fieldName.className="inputfield2";
}



function del_plkk_$$xxxx_d_soft_complie$$rnd$(r){

if("<%=cvva_0_p_3%>"=="1"){

if (confirm("确认删除?")==1){


//千万不要.getElementById("$post$myname$_len_pl").value减1，以免处理页提取出错误的空值行
//var now_possel2=parseFloat(document.getElementById("$post$myname$_len_pl").value);

//now_possel2=now_possel2-1;
//document.getElementById("$post$myname$_len_pl").value=now_possel2;





	var theTable = document.getElementById("$post$myname$_table_pl");	

	var r1 = document.getElementById(r);

    var llln=parseFloat(theTable.rows.length)-1
for(var ia=0;ia<=llln;ia++)

{
if (theTable.rows[ia].id==r){


theTable.deleteRow(ia);

break;

}
}

}

}
else
{
alert("此批量输入框已被设置为不允许删除行");
}



}

</script>


<%end if





cvva_1=cvva(1)
cvva_1_p=split(cvva_1,"|$aspcpu_g$|")


if trim(cvva_1)="" then
pllentt=0
else
pllentt=ubound(cvva_1_p)+1


redim liesxx(pllentt+1,4)

for plniii=1 to pllentt
cvva_1_p_1=cvva_1_p(plniii-1)
cvva_1_p_1_p=split(cvva_1_p_1,"|$aspcpu_r1$|")


'列参数
cangsxx=cvva_1_p_1_p(0)
'列名
lienamex=cvva_1_p_1_p(1)
'列类型
pzd_typex=cvva_1_p_1_p(2)
'字段次序
pcixux=cvva_1_p_1_p(3)

liesxx(plniii-1,0)=cangsxx
liesxx(plniii-1,1)=lienamex
liesxx(plniii-1,2)=pzd_typex
liesxx(plniii-1,3)=pcixux


next

'进行 列排序
liesxxpl=paixu_a(liesxx,pllentt-1,3,3)

%>

<input name="$post$myname$_len_pl" value="0" type="hidden">

<table id="$post$myname$_table_pl">
<tr><td class="borderon2" width=34></td>
<%

for plniii2=1 to pllentt


cangsxx=liesxxpl(plniii2-1,0)
lienamex=liesxxpl(plniii2-1,1)
pzd_typex=liesxxpl(plniii2-1,2)
pcixux=liesxxpl(plniii2-1,3)

%>

<td width=90 class="borderon2"><strong><%=lienamex%></strong></td>

<%

next
%>
</tr>




<tr style="display:none" id="$post$myname$_hang_x_tmpl">
<%



for plniii2=1 to pllentt
cangsxx=liesxxpl(plniii2-1,0)
lienamex=liesxxpl(plniii2-1,1)
pzd_typex=liesxxpl(plniii2-1,2)
pcixux=liesxxpl(plniii2-1,3)

%>

<td width=90 class="inputfieldtd">

<%if clng(pzd_typex)>=8 then%>

<input  type=text size=6  name="$post$myname$_l<%=plniii2%>_h$$hang_id_x$$_m" id="$post$myname$_l<%=plniii2%>_h$$hang_id_x$$_m" onclick="window.open('../../../../inc/ND_models_popwin_pl_inputs.asp?cangs=<%=UrlEncoding_x(replace_huanhang_md(cangsxx))%>&value=$$hang_v_x$lie$<%=plniii2%>$a$&field=$post$myname$_l<%=plniii2%>_h$$hang_id_x$$','','directorys=no,toolbar=no,status=no,menubar=no,scrollbars=yes,resizable=no,width=650,height=370,top=150,left=150')" class="inputfield2" readonly="readonly" $$hang_v_x$lie$<%=plniii2%>$b$>

<textarea style="display:none" name="$post$myname$_l<%=plniii2%>_h$$hang_id_x$$" id="$post$myname$_l<%=plniii2%>_h$$hang_id_x$$">$$hang_v_x$lie$<%=plniii2%>$c$</textarea>

<%else%>

<input class="inputfield2" type=text size=6  name="$post$myname$_l<%=plniii2%>_h$$hang_id_x$$" id="$post$myname$_l<%=plniii2%>_h$$hang_id_x$$" onfocus="focusChange(this)" onblur="blurChange(this)" $$hang_v_x$lie$<%=plniii2%>$b$>


<%end if%>

</td>

<%

next
%>
</tr>

<script language=javascript>

function add_pl_$post$myname$(values,pzztypes,values_trues){




var now_possel1=parseFloat(document.getElementById("$post$myname$_len_pl").value);

if(now_possel1<<%=cvva_0_p_2%>){



var now_possel=parseFloat(document.getElementById("$post$myname$_len_pl").value);

now_possel=now_possel+1;

document.getElementById("$post$myname$_len_pl").value=now_possel;

var theTable=document.getElementById("$post$myname$_table_pl");

var rowNumber = parseFloat(theTable.rows.length);

theTable.insertRow(rowNumber);



var iddd="$post$myname$_hang_x_"+now_possel;

theTable.rows[rowNumber].id=iddd;

var ccctnt=document.getElementById("$post$myname$_hang_x_tmpl").innerHTML;



var values_arr;
var pzztypes_arr;
var values_trues_arr;
values_arr=values.split("|nd_aspcpu_fenge_pl_lie_x|");
pzztypes_arr=pzztypes.split("|nd_aspcpu_fenge_pl_lie_x|");
values_trues_arr=values_trues.split("|nd_aspcpu_fenge_pl_lie_x|");

var values_arr_len=values_arr.length-1;

var nlie;

var reegz,reegz2,reegz3;
var ncntnca;
var ncntnca2;
var ncntnca3;
ccctnt=ccctnt.replace(/\$\$hang_id_x\$\$/igm,now_possel);


for(var izzza=0;izzza<=values_arr_len;izzza++){


ncntnca=values_arr[izzza];
ncntnca2=pzztypes_arr[izzza];
ncntnca3=values_trues_arr[izzza];



ncntnca=ncntnca.replace(/\|nd_a_yinghao_x\|/igm,"\"");



ncntnca3=ncntnca3.replace(/\|nd_a_yinghao_x\|/igm,"\"");
ncntnca3=ncntnca3.replace(/\<\/textarea\>/igm,"\[\$\/\$textarea\]");



nlie=izzza+1;
//eval("reegz = /\$\$hang_v_x\$lie\$"+nlie+"\$a\$/igm");
//eval("reegz2 = /\$\$hang_v_x\$lie\$"+nlie+"\$b\$/igm");
//eval("reegz3 = /\$\$hang_v_x\$lie\$"+nlie+"\$c\$/igm");


reegz = new RegExp("\\$\\$hang_v_x\\$lie\\$"+nlie+"\\$a\\$","igm"); 
reegz2 = new RegExp("\\$\\$hang_v_x\\$lie\\$"+nlie+"\\$b\\$","igm"); 
reegz3 = new RegExp("\\$\\$hang_v_x\\$lie\\$"+nlie+"\\$c\\$","igm"); 


if(parseFloat(ncntnca2)>=9){

ccctnt=ccctnt.replace(reegz,ncntnca);
ccctnt=ccctnt.replace(reegz2," value=\""+ncntnca3+"\" ");
ccctnt=ccctnt.replace(reegz3,ncntnca3);
}
else
{
ccctnt=ccctnt.replace(reegz,"");
ccctnt=ccctnt.replace(reegz2," value=\""+ncntnca3+"\" ");

}




}


theTable.rows[rowNumber].insertCell(0);

theTable.rows[rowNumber].cells[0].colSpan=values_arr_len+3;
theTable.rows[rowNumber].cells[0].innerHTML="<table><tr><td class=borderon2 width=34><a href='javascript:void(0)' onclick=del_plkk_$$xxxx_d_soft_complie$$rnd$(\'"+iddd+"\')>删除</a></td>"+ccctnt+"</tr></table>";

}
else

{

alert("已达到最大批量输入行数，不能再增加");
}


}

</script>


<%


pllastv=$mylast$value$

if cstr(pllastv&"")="" then
hang_orgg=0
else
hang_orgg=ubound(split(pllastv,"|nd_aspcpu_fenge_pl_lie_do_hang_x|"))+1
end if

'行
for hang_i=1 to hang_orgg


'------------
values=""
pzd_typexs=""
values_trues=""

'列
for plniii2=1 to pllentt



cangsxx=liesxxpl(plniii2-1,0)
lienamex=liesxxpl(plniii2-1,1)
pzd_typex=liesxxpl(plniii2-1,2)
pcixux=liesxxpl(plniii2-1,3)


'--------------------------
'当前行当前列值:
if plniii2>ubound(split(split(pllastv,"|nd_aspcpu_fenge_pl_lie_do_hang_x|")(hang_i-1),"|nd_aspcpu_fenge_pl_lie_do_lie_x|"))+1 then
values_1=""
else
values_1=split(split(pllastv,"|nd_aspcpu_fenge_pl_lie_do_hang_x|")(hang_i-1),"|nd_aspcpu_fenge_pl_lie_do_lie_x|")(plniii2-1)
end if



if clng(pzd_typex)=2 then 
if cstr(split(cangsxx,"|$aspcpu_a$|")(2)&"")="1" then
values_1=now()
end if
end if


'--------------------------


if clng(pzd_typex)>=9 then
values=values&UrlEncoding_x(replace_huanhang_md(values_1))&"|nd_aspcpu_fenge_pl_lie_x|"
else
'如果是文本输入框
values=values&values_1&"|nd_aspcpu_fenge_pl_lie_x|"
end if

values_trues=values_trues&values_1&"|nd_aspcpu_fenge_pl_lie_x|"

pzd_typexs=pzd_typexs&pzd_typex&"|nd_aspcpu_fenge_pl_lie_x|"



next

values=replace(values,"""","|nd_a_yinghao_x|")
pzd_typexs=replace(pzd_typexs,"""","|nd_a_yinghao_x|")
values_trues=replace(values_trues,"""","|nd_a_yinghao_x|")

if pllentt>=1 then
values=left(values,len(values)-len("|nd_aspcpu_fenge_pl_lie_x|"))
pzd_typexs=left(pzd_typexs,len(pzd_typexs)-len("|nd_aspcpu_fenge_pl_lie_x|"))
values_trues=left(values_trues,len(values_trues)-len("|nd_aspcpu_fenge_pl_lie_x|"))
end if

%>

<script language=javascript>
add_pl_$post$myname$("<%=values%>","<%=pzd_typexs%>","<%=values_trues%>");

</script>
<%


next
%>

</table>


<%
values=""
pzd_typexs=""
values_trues=""


for plniii22=1 to pllentt

cangsxx=liesxxpl(plniii22-1,0)
lienamex=liesxxpl(plniii22-1,1)
pzd_typex=liesxxpl(plniii22-1,2)
pcixux=liesxxpl(plniii22-1,3)



'--------------------------
'当前行当前列值:
values_1=""
if clng(pzd_typex)=1 then 
values_1=split(cangsxx,"|$aspcpu_a$|")(1)
end if
if clng(pzd_typex)=2 then 
if cstr(split(cangsxx,"|$aspcpu_a$|")(0)&"")="1" then
values_1=now()
end if
end if
if clng(pzd_typex)=3 then 
values_1=split(cangsxx,"|$aspcpu_a$|")(3)
end if
if clng(pzd_typex)=7 then 
values_1=split(cangsxx,"|$aspcpu_a$|")(1)
end if

'--------------------------




values=values&values_1&"|nd_aspcpu_fenge_pl_lie_x|"
values_trues=values_trues&values_1&"|nd_aspcpu_fenge_pl_lie_x|"

pzd_typexs=pzd_typexs&pzd_typex&"|nd_aspcpu_fenge_pl_lie_x|"

next

values=replace(values,"""","|nd_a_yinghao_x|")
pzd_typexs=replace(pzd_typexs,"""","|nd_a_yinghao_x|")
values_trues=replace(values_trues,"""","|nd_a_yinghao_x|")

if pllentt>=1 then
values=left(values,len(values)-len("|nd_aspcpu_fenge_pl_lie_x|"))
pzd_typexs=left(pzd_typexs,len(pzd_typexs)-len("|nd_aspcpu_fenge_pl_lie_x|"))
values_trues=left(values_trues,len(values_trues)-len("|nd_aspcpu_fenge_pl_lie_x|"))
end if


%>


<br />
<a href="javascript:void(0)" onclick="add_pl_$post$myname$('<%=values%>','<%=pzd_typexs%>','<%=values_trues%>');"><strong><font color="#0000FF">点击本处增加一个输入行</font></strong></a><br />

<%
end if
%>